inherited FCadastroPortador: TFCadastroPortador
  Left = 269
  Top = 88
  Caption = 'Cadastro Portador'
  Constraints.MinHeight = 264
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 16
  inherited pcCadastro: TPageControl
    inherited TsCadastro: TTabSheet
      inherited panel1: TPanel
        object Label14: TLabel [0]
          Left = 7
          Top = 47
          Width = 40
          Height = 16
          Caption = 'Codigo'
        end
        object DBText1: TDBText [1]
          Left = 7
          Top = 73
          Width = 52
          Height = 16
          Alignment = taCenter
          AutoSize = True
          DataField = 'PORT_CODIGO'
          DataSource = dsCadastro
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clRed
          Font.Height = -13
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object Label1: TLabel [2]
          Left = 76
          Top = 47
          Width = 58
          Height = 16
          Caption = 'Descri'#231#227'o'
        end
        object Label2: TLabel [3]
          Left = 76
          Top = 98
          Width = 95
          Height = 16
          Caption = 'C'#243'digo Relat'#243'rio'
        end
        inherited panel2: TPanel
          inherited DBNavigator1: TDBNavigator
            Hints.Strings = ()
          end
        end
        inherited panel3: TPanel
          inherited BtnConsuta: TBitBtn
            OnClick = BtnConsutaClick
          end
        end
        object DBENome: TDBEdit
          Left = 76
          Top = 68
          Width = 408
          Height = 24
          CharCase = ecUpperCase
          DataField = 'PORT_DESCRICAO'
          DataSource = dsCadastro
          TabOrder = 2
        end
        object DBCHBDescontado: TDBCheckBox
          Left = 490
          Top = 69
          Width = 98
          Height = 21
          Caption = 'Descontado'
          DataField = 'PORT_DESCONTADO'
          DataSource = dsCadastro
          TabOrder = 3
          ValueChecked = '1'
          ValueUnchecked = '0'
        end
        object dbeCodRelatorio: TDBEdit
          Left = 76
          Top = 118
          Width = 43
          Height = 24
          DataField = 'PORT_COD_RELATORIO'
          DataSource = dsCadastro
          TabOrder = 4
        end
      end
    end
  end
  inherited dsCadastro: TDataSource
    Left = 168
    Top = 152
  end
  inherited QCadastro: TQuery
    AfterInsert = QCadastroAfterInsert
    SQL.Strings = (
      'select * from Portador'
      'Order By  Port_Codigo'
      '')
    Left = 168
    Top = 192
    object QCadastroPORT_CODIGO: TIntegerField
      FieldName = 'PORT_CODIGO'
      Origin = 'BASE.PORTADOR.PORT_CODIGO'
    end
    object QCadastroPORT_DESCRICAO: TStringField
      FieldName = 'PORT_DESCRICAO'
      Origin = 'BASE.PORTADOR.PORT_DESCRICAO'
      Size = 100
    end
    object QCadastroDATAMODIFICACAO: TDateTimeField
      FieldName = 'DATAMODIFICACAO'
      Origin = 'BASE.PORTADOR.DATAMODIFICACAO'
    end
    object QCadastroUSUARIO: TStringField
      FieldName = 'USUARIO'
      Origin = 'BASE.PORTADOR.USUARIO'
      Size = 10
    end
    object QCadastroCODIGOOLD: TIntegerField
      FieldName = 'CODIGOOLD'
      Origin = 'BASE.PORTADOR.CODIGOOLD'
    end
    object QCadastroPORT_DESCONTADO: TIntegerField
      FieldName = 'PORT_DESCONTADO'
      Origin = 'BASE.PORTADOR.PORT_DESCONTADO'
    end
    object QCadastroPORT_COD_RELATORIO: TStringField
      FieldName = 'PORT_COD_RELATORIO'
      Origin = 'BASE.PORTADOR.PORT_COD_RELATORIO'
      FixedChar = True
      Size = 3
    end
    object QCadastroUSUARIO_CADASTRO: TStringField
      FieldName = 'USUARIO_CADASTRO'
      Origin = 'BASE.PORTADOR.USUARIO_CADASTRO'
    end
    object QCadastroUSUARIO_AUTERACAO: TStringField
      FieldName = 'USUARIO_AUTERACAO'
      Origin = 'BASE.PORTADOR.USUARIO_AUTERACAO'
    end
    object QCadastroUSUARIO_EXCLUSAO: TStringField
      FieldName = 'USUARIO_EXCLUSAO'
      Origin = 'BASE.PORTADOR.USUARIO_EXCLUSAO'
    end
    object QCadastroDATA_CADASTRO: TDateTimeField
      FieldName = 'DATA_CADASTRO'
      Origin = 'BASE.PORTADOR.DATA_CADASTRO'
    end
    object QCadastroDATA_EXCLUSAO: TDateTimeField
      FieldName = 'DATA_EXCLUSAO'
      Origin = 'BASE.PORTADOR.DATA_EXCLUSAO'
    end
    object QCadastroDATA_AUTERACAO: TDateTimeField
      FieldName = 'DATA_AUTERACAO'
      Origin = 'BASE.PORTADOR.DATA_AUTERACAO'
    end
    object QCadastroEXCLUIDO: TStringField
      FieldName = 'EXCLUIDO'
      Origin = 'BASE.PORTADOR.EXCLUIDO'
      FixedChar = True
      Size = 1
    end
    object QCadastroUSUARIO_RECUPERACAO: TStringField
      FieldName = 'USUARIO_RECUPERACAO'
      Origin = 'BASE.PORTADOR.USUARIO_RECUPERACAO'
    end
    object QCadastroDATA_RECUPERACAO: TDateTimeField
      FieldName = 'DATA_RECUPERACAO'
      Origin = 'BASE.PORTADOR.DATA_RECUPERACAO'
    end
  end
  object QPortador: TQuery
    DatabaseName = 'base'
    RequestLive = True
    SQL.Strings = (
      'select * from Portador'
      'Order By  Port_Codigo')
    Left = 216
    Top = 184
  end
  object DSPortador: TDataSource
    DataSet = QPortador
    Left = 248
    Top = 184
  end
end
